home *** CD-ROM | disk | FTP | other *** search
/ Risc World 3 / Risc World 3.iso / SOFTWARE / ISSUE3 / SCRIBBLE / Examples / world < prev   
Encoding:
Text File  |  2002-09-06  |  239 b   |  7 lines
  1. mydoc = BEGIN (arg[1].."/pdf")
  2. mydoc:begin_page (A6.width,A6.height)
  3. times_roman = mydoc:findfont ("Times-Roman", "host", 0)
  4. mydoc:setfont(times_roman, 18)
  5. mydoc:set_text_pos (A6.width/3,A6.height/1.5)
  6. mydoc:show "Hello World"
  7. mydoc:END ()